inherited frmStorage: TfrmStorage
  Caption = 'frmStorage'
  PixelsPerInch = 96
  TextHeight = 12
  inherited rzszpnlTree: TRzSizePanel
    inherited cxpgcntrlTree: TcxPageControl
      ClientRectBottom = 408
      ClientRectRight = 167
      ClientRectTop = 23
      inherited ctsTree: TcxTabSheet
        TabVisible = False
      end
      inherited ctsGrid: TcxTabSheet
        inherited cxgrdTree: TcxGrid
          inherited cxgrdbtblvwTree: TcxGridDBTableView
            DataController.DataSource = dsData
            DataController.KeyFieldNames = 'STORAGE_ID'
            OptionsView.GroupByBox = False
            object cxgrdbtblvwTreeSTORAGE_ID: TcxGridDBColumn
              DataBinding.FieldName = 'STORAGE_ID'
              Visible = False
              HeaderAlignmentHorz = taCenter
            end
            object cxgrdbtblvwTreeSTORAGE_NM: TcxGridDBColumn
              DataBinding.FieldName = 'STORAGE_NM'
              HeaderAlignmentHorz = taCenter
              Width = 106
            end
            object cxgrdbtblvwTreeZJM: TcxGridDBColumn
              DataBinding.FieldName = 'ZJM'
              HeaderAlignmentHorz = taCenter
            end
          end
        end
      end
    end
  end
  inherited pnlData: TPanel
    Ctl3D = False
    ParentCtl3D = False
    object lblSTORAGE_NM: TLabel
      Left = 32
      Top = 48
      Width = 36
      Height = 12
      Caption = #20179#20648#20301
      FocusControl = dbedtSTORAGE_NM
    end
    object lblZJM: TLabel
      Left = 32
      Top = 88
      Width = 36
      Height = 12
      Caption = #21161#35760#30721
      FocusControl = dbedtZJM
    end
    inline fmeUserInfo1: TfmeUserInfo
      Left = 0
      Top = 339
      Width = 513
      Height = 69
      Align = alBottom
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      inherited dbedtAddDate: TDBEdit
        DataSource = dsData
      end
      inherited dbedtEditDate: TDBEdit
        DataSource = dsData
      end
      inherited cdsAddUser: TClientDataSet
        IndexFieldNames = 'USER_ID'
        MasterFields = 'ADD_USER'
        MasterSource = dsData
        PacketRecords = 0
      end
      inherited cdsEditUser: TClientDataSet
        IndexFieldNames = 'USER_ID'
        MasterFields = 'EDIT_USER'
        MasterSource = dsData
        PacketRecords = 0
      end
    end
    object dbedtSTORAGE_NM: TDBEdit
      Left = 68
      Top = 45
      Width = 244
      Height = 18
      DataField = 'STORAGE_NM'
      DataSource = dsData
      TabOrder = 1
      OnChange = dbedtSTORAGE_NMChange
    end
    object dbedtZJM: TDBEdit
      Left = 68
      Top = 85
      Width = 124
      Height = 18
      DataField = 'ZJM'
      DataSource = dsData
      TabOrder = 2
    end
  end
  inherited adsData: TADODataSet
    CursorType = ctStatic
    CommandText = 'select * from storage order by storage_id'
    object adsDataSTORAGE_ID: TLargeintField
      FieldName = 'STORAGE_ID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object adsDataSTORAGE_NM: TStringField
      FieldName = 'STORAGE_NM'
    end
    object adsDataZJM: TStringField
      FieldName = 'ZJM'
      Size = 10
    end
    object adsDataADD_USER: TLargeintField
      FieldName = 'ADD_USER'
    end
    object adsDataADD_TIME: TDateTimeField
      FieldName = 'ADD_TIME'
    end
    object adsDataEDIT_USER: TLargeintField
      FieldName = 'EDIT_USER'
    end
    object adsDataEDIT_TIME: TDateTimeField
      FieldName = 'EDIT_TIME'
    end
  end
  inherited dspData: TDataSetProvider
    UpdateMode = upWhereKeyOnly
  end
  inherited cdsData: TClientDataSet
    AfterOpen = cdsDataAfterOpen
    object cdsDataSTORAGE_ID: TLargeintField
      DisplayLabel = 'ID'
      FieldName = 'STORAGE_ID'
    end
    object cdsDataSTORAGE_NM: TStringField
      DisplayLabel = #20179#20648#20301
      FieldName = 'STORAGE_NM'
    end
    object cdsDataZJM: TStringField
      DisplayLabel = #21161#35760#30721
      FieldName = 'ZJM'
      Size = 10
    end
    object cdsDataADD_USER: TLargeintField
      FieldName = 'ADD_USER'
    end
    object cdsDataADD_TIME: TDateTimeField
      FieldName = 'ADD_TIME'
    end
    object cdsDataEDIT_USER: TLargeintField
      FieldName = 'EDIT_USER'
    end
    object cdsDataEDIT_TIME: TDateTimeField
      FieldName = 'EDIT_TIME'
    end
  end
end
